function __test_crout()

	% functie de test pentru factorizarea Crout
	%Testul nr.1
	A=[ 1 2 3; 6 5 4; 9 4 3]
	[L U] = crout( A );
	printf(" Descompunerea este :\n");
        disp("L:");disp(L);
	disp("U:");disp(U);
	%solutia este L=[ 1 0 0; 6 -7 0; 9 -14 4]; U=[1 2 3; 0 1 2; 0 0 1]
	
	%Testul nr.2
	A=[ -1 -2 -4 -5; 2 3 4 5;8 3 4 5; 2 4 6 1]
	[L U] = crout( A );
	printf(" Descompunerea este :\n");
        disp("L:");disp(L);
	disp("U:");disp(U);
	%solutia este L=[ -1 0 0 0; 2 -1 0 0; 8 -13 24 0; 2 0 -2 -6.5]
        % U=[ 1 2 4 5; 0 1 4 5; 0 0 1 1.25; 0 0 0 1];

	%Testul nr.3
	A=[ 10 9; 2 3];
	[L U] = crout( A );
	printf(" Descompunerea este :\n");
        disp("L:");disp(L);
	disp("U:");disp(U);
	%solutie : L=[10 0; 2 1.2]; U=[1 0.9; 0 1];

	%Testul nr.4
	A=[ 32 16 4; 2 6 1; 4 18 2]
	[L U] = crout( A );
	printf(" Descompunerea este :\n");
        disp("L:");disp(L);
	disp("U:");disp(U);
	% L=[ 32 0 0; 2 5 0; 4 16 -0.9]; U=[1 0.5 0.125; 0 1 0.15; 0 0 1]
